home *** CD-ROM | disk | FTP | other *** search
- object pergunfrm: Tpergunfrm
- Left = 203
- Top = 107
- HelpContext = 30
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'G�nl�k Giri�ler'
- ClientHeight = 271
- ClientWidth = 470
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel3: TPanel
- Left = 0
- Top = 271
- Width = 470
- Height = 0
- Align = alClient
- TabOrder = 2
- object DBGrid1: TDBGrid
- Left = 1
- Top = -193
- Width = 468
- Height = 192
- Align = alBottom
- DataSource = Dmper.gunSource
- ReadOnly = True
- TabOrder = 0
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = clWindowText
- TitleFont.Height = -11
- TitleFont.Name = 'MS Sans Serif'
- TitleFont.Style = []
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 63
- Width = 470
- Height = 208
- Align = alTop
- TabOrder = 0
- object GroupBox1: TGroupBox
- Left = 237
- Top = 6
- Width = 228
- Height = 195
- Caption = 'Personel'
- TabOrder = 0
- object Label5: TLabel
- Left = 83
- Top = 50
- Width = 59
- Height = 13
- Caption = 'Personel Ad�'
- end
- object SONl: TSpeedButton
- Left = 110
- Top = 16
- Width = 41
- Height = 25
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333FF3333333333333447333333333333377FFF33333333333744473333333
- 333337773FF3333333333444447333333333373F773FF3333333334444447333
- 33333373F3773FF3333333744444447333333337F333773FF333333444444444
- 733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
- 999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
- 33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
- 333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
- 33333777333333333333CC333333333333337733333333333333}
- NumGlyphs = 2
- OnClick = SONlClick
- end
- object ILKl: TSpeedButton
- Left = 69
- Top = 16
- Width = 41
- Height = 25
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333333333333333FF3333333333333744333333333333F773333333333337
- 44473333333333F777F3333333333744444333333333F7733733333333374444
- 4433333333F77333733333333744444447333333F7733337F333333744444444
- 433333F77333333733333744444444443333377FFFFFFF7FFFFF999999999999
- 9999733777777777777333CCCCCCCCCC33333773FF333373F3333333CCCCCCCC
- C333333773FF3337F333333333CCCCCCC33333333773FF373F3333333333CCCC
- CC333333333773FF73F33333333333CCCCC3333333333773F7F3333333333333
- CCC333333333333777FF33333333333333CC3333333333333773}
- NumGlyphs = 2
- OnClick = ILKlClick
- end
- object Label7: TLabel
- Left = 94
- Top = 88
- Width = 34
- Height = 13
- Caption = 'Sicil no'
- end
- object Edit1: TEdit
- Left = 12
- Top = 66
- Width = 205
- Height = 21
- ReadOnly = True
- TabOrder = 0
- end
- object arasira: TRadioGroup
- Left = 4
- Top = 137
- Width = 221
- Height = 55
- Caption = 'Arama sekli '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ItemIndex = 0
- Items.Strings = (
- 'Sicilno'
- 'Ad'
- 'Soyad')
- ParentFont = False
- TabOrder = 1
- OnClick = arasiraClick
- end
- object ara: TEdit
- Left = 90
- Top = 158
- Width = 112
- Height = 21
- TabOrder = 2
- OnExit = araExit
- OnKeyUp = araKeyUp
- end
- object Edit2: TEdit
- Left = 96
- Top = 104
- Width = 33
- Height = 21
- ReadOnly = True
- TabOrder = 3
- OnChange = Edit2Change
- end
- end
- object GroupBox2: TGroupBox
- Left = 3
- Top = 6
- Width = 228
- Height = 195
- Caption = 'Tarih/Saat'
- TabOrder = 1
- object Label1: TLabel
- Left = 58
- Top = 51
- Width = 24
- Height = 13
- Caption = 'Tarih'
- end
- object Label2: TLabel
- Left = 152
- Top = 71
- Width = 32
- Height = 13
- Caption = 'Label2'
- end
- object ONCEKI: TSpeedButton
- Left = 39
- Top = 20
- Width = 35
- Height = 26
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333FF3333333333333003333333333333F77F33333333333009033
- 333333333F7737F333333333009990333333333F773337FFFFFF330099999000
- 00003F773333377777770099999999999990773FF33333FFFFF7330099999000
- 000033773FF33777777733330099903333333333773FF7F33333333333009033
- 33333333337737F3333333333333003333333333333377333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333}
- NumGlyphs = 2
- ParentFont = False
- OnClick = ONCEKIClick
- end
- object SONRAKI: TSpeedButton
- Left = 74
- Top = 20
- Width = 33
- Height = 26
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333FF3333333333333003333
- 3333333333773FF3333333333309003333333333337F773FF333333333099900
- 33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
- 99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
- 33333333337F3F77333333333309003333333333337F77333333333333003333
- 3333333333773333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333}
- NumGlyphs = 2
- ParentFont = False
- OnClick = SONRAKIClick
- end
- object Label6: TLabel
- Left = 128
- Top = 32
- Width = 43
- Height = 13
- Caption = 'Kay�t No:'
- end
- object TAR: TMaskEdit
- Left = 27
- Top = 69
- Width = 89
- Height = 24
- EditMask = '!99/99/0000;1;_'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- MaxLength = 10
- ParentFont = False
- TabOrder = 0
- Text = ' . . '
- OnChange = TARChange
- end
- object GroupBox3: TGroupBox
- Left = 5
- Top = 101
- Width = 218
- Height = 90
- Caption = 'Mesai'
- TabOrder = 1
- object Label3: TLabel
- Left = 58
- Top = 26
- Width = 27
- Height = 16
- Caption = 'Giri�'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 58
- Top = 54
- Width = 29
- Height = 16
- Caption = '��k��'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object gir: TMaskEdit
- Left = 101
- Top = 21
- Width = 57
- Height = 24
- EditMask = '!90:00;1;_'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- MaxLength = 5
- ParentFont = False
- TabOrder = 0
- Text = ' : '
- OnKeyPress = girKeyPress
- end
- object cik: TMaskEdit
- Left = 101
- Top = 50
- Width = 57
- Height = 24
- EditMask = '!90:00;1;_'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- MaxLength = 5
- ParentFont = False
- TabOrder = 1
- Text = ' : '
- end
- end
- object SpinButton1: TSpinButton
- Left = 115
- Top = 70
- Width = 20
- Height = 22
- DownGlyph.Data = {
- DE000000424DDE00000000000000360000002800000009000000060000000100
- 180000000000A800000000000000000000000000000000000000008080008080
- 0080800080800080800080800080800080800080800000808000808000808000
- 8080000000008080008080008080008080000080800080800080800000000000
- 0000000000808000808000808000008080008080000000000000000000000000
- 0000000080800080800000808000000000000000000000000000000000000000
- 0000008080810080800080800080800080800080800080800080800080800080
- 8001}
- TabOrder = 2
- UpGlyph.Data = {
- DE000000424DDE00000000000000360000002800000009000000060000000100
- 180000000000A800000000000000000000000000000000000000008080008080
- 0080800080800080800080800080800080800080800000808000000000000000
- 0000000000000000000000000000008080010080800080800000000000000000
- 0000000000000000808000808081008080008080008080000000000000000000
- 0080800080800080800000808000808000808000808000000000808000808000
- 8080008080000080800080800080800080800080800080800080800080800080
- 8081}
- OnDownClick = SpinButton1DownClick
- OnUpClick = SpinButton1UpClick
- end
- object Edit3: TEdit
- Left = 180
- Top = 29
- Width = 35
- Height = 21
- ReadOnly = True
- TabOrder = 3
- Text = '1'
- end
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 470
- Height = 63
- Align = alTop
- TabOrder = 1
- object KAYIT: TSpeedButton
- Left = 72
- Top = 7
- Width = 60
- Height = 26
- Caption = 'Kayit'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 555555555555555555555555555555555555555555FF55555555555559055555
- 55555555577FF5555555555599905555555555557777F5555555555599905555
- 555555557777FF5555555559999905555555555777777F555555559999990555
- 5555557777777FF5555557990599905555555777757777F55555790555599055
- 55557775555777FF5555555555599905555555555557777F5555555555559905
- 555555555555777FF5555555555559905555555555555777FF55555555555579
- 05555555555555777FF5555555555557905555555555555777FF555555555555
- 5990555555555555577755555555555555555555555555555555}
- NumGlyphs = 2
- ParentFont = False
- OnClick = KAYITClick
- end
- object SIL: TSpeedButton
- Left = 132
- Top = 7
- Width = 58
- Height = 26
- Caption = 'Sil'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
- 305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
- 005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
- B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
- B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
- B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
- B0557777FF577777F7F500000E055550805577777F7555575755500000555555
- 05555777775555557F5555000555555505555577755555557555}
- NumGlyphs = 2
- ParentFont = False
- OnClick = SILClick
- end
- object KAPAT: TSpeedButton
- Left = 328
- Top = 7
- Width = 67
- Height = 26
- Caption = 'Kapat'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
- 03333377777777777F333301111111110333337F333333337F33330111111111
- 0333337F333333337F333301111111110333337F333333337F33330111111111
- 0333337F333333337F333301111111110333337F333333337F33330111111111
- 0333337F3333333F7F333301111111B10333337F333333737F33330111111111
- 0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
- 0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
- 0333337F377777337F333301111111110333337F333333337F33330111111111
- 0333337FFFFFFFFF7F3333000000000003333377777777777333}
- NumGlyphs = 2
- ParentFont = False
- OnClick = KAPATClick
- end
- object SpeedButton1: TSpeedButton
- Left = 395
- Top = 7
- Width = 69
- Height = 26
- Caption = 'Yard�m'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
- 33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
- FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
- FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
- FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
- FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
- FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
- 3333333773FFFF77333333333FBFBF3333333333377777333333}
- NumGlyphs = 2
- ParentFont = False
- OnClick = SpeedButton1Click
- end
- object YENI: TSpeedButton
- Left = 7
- Top = 7
- Width = 65
- Height = 26
- Caption = 'Yeni'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
- 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
- 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- NumGlyphs = 2
- ParentFont = False
- OnClick = YENIClick
- end
- object SpeedButton2: TSpeedButton
- Left = 190
- Top = 7
- Width = 56
- Height = 26
- Caption = 'Tablo'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555FFFFFFFFFF5555550000000000555557777777777F5555550FFFFFFFF
- 0555557F5FFFF557F5555550F0000FFF0555557F77775557F5555550FFFFFFFF
- 0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
- 0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
- 0555557F5FFF5557F5555550F000FFFF0555557F77755FF7F5555550FFFFF000
- 0555557F5FF5777755555550F00FF0F05555557F77557F7555555550FFFFF005
- 5555557FFFFF7755555555500000005555555577777775555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- ParentFont = False
- OnClick = SpeedButton2Click
- end
- object Hesapla: TSpeedButton
- Left = 246
- Top = 7
- Width = 82
- Height = 26
- Caption = 'Hesapla'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
- 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
- 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
- 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
- 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
- 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
- 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
- 0333337F777777737F333308888888880333337F333333337F33330888888888
- 03333373FFFFFFFF733333700000000073333337777777773333}
- NumGlyphs = 2
- ParentFont = False
- OnClick = HesaplaClick
- end
- object oto: TSpeedButton
- Left = 7
- Top = 33
- Width = 125
- Height = 26
- Caption = 'Otomatik'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
- 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
- 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- NumGlyphs = 2
- ParentFont = False
- OnClick = otoClick
- end
- end
- end
-